home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / program / swagd_f.zip / EGAVGA.SWG / 0077_Retrace Correction.pas < prev    next >
Pascal/Delphi Source File  |  1994-01-27  |  736b  |  23 lines

  1. {
  2. > I think TP is fast enough for that, because your video card needs much
  3. > time to display the screen. Perhaps this is a little bit faster on
  4. > REALLY slow machines :
  5.  
  6.      Actually, that won't do what it's supposed to do...
  7.      When you use the IN instruction the format is like this:
  8.  
  9.      IN op1,op2   That transfers a byte, word or dword from the in
  10.                   op2 specified port into AL, AX or EAX.
  11.  
  12. > Asm
  13. >   MOV DX,$03DA
  14. > @@1:
  15. >   IN  DX,AX     <-----  Therefore, change to: in al,dx
  16. >   TEST AX,$08   <-----                        test al,8
  17. >   JZ @@1
  18. > @@2:
  19. >   IN  DX,AX     <-----                        in al,dx
  20. >   TEST AX,$08   <-----                        test al,8
  21. >   JNZ @@2
  22. > End;
  23. }